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3 1 001 MODULE BASSERRTXT ( ' 

5 § B86 IDENT = '1-004' ' File: BASERRTAT B52 

3 00 dz ! Edit: ML1004 

; ¢ Ops ; BEGIN 

: § Bee : eee eR REA AAAAAAAAAAAAAAAAARAAAAAAAAEAETEAAAAAAAAAEAAAAAAHAARARAAAARARETEAeEEEE 
: :* : 
; 8 $008 1 !* COPYRIGHT (c) 1978, 1980, 1982, 1984 BY * 
3 .] 0009 1 !* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * 
3 19 Bare : : ALL RIGHTS RESERVED. * 
: : ® 
; \¢ Bog 1 '* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
$ 1 001 1 !@ ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE t 
; 0014 1 !* INCLUSI THE ABOVE COPYRIGHT NOTI THIS SOFTWARE OR ANY OTHER * 
é 15 0015 1 !* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
; 16 gatg 1 !* QTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
3 \ ted : :* TRANSFERRED. * 
3 '* ® 
; 9 0019 1 !* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
3 20 BOSS 1 !* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT a 
3 $3 gh ; :* CORPORATION. * 
3 ‘® ® 
3 : 0098 1 !* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * 
3 : BeSe : ‘* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. = 
6 ® 

; 0026 1 !* ¥ 
3 e7 34 LS wee eee eee eR AAA AAA AAA AEA AAA AAA AAA AAA AAAAAAAAAAAERARAEAEEEREEE 
:; 28 0028 1! 

s $3 0029 1! 

3 0 0030 1 

s $1 0031 1 !4¢ 

3 3 0032 1 ! FACILITY: BASIC-PLUS-2 Error Messages 

ae 0033 1! 

: 34 0034 1 ! ABSTRACT: 

;: 0035 1! 

s 0036 1! This module returns: to a BLISS progres the 

| a 0037 1! error text corresponding to a BASI 

i m= 0038 1! error code. This module is used to produce BASMSG.MSG. 

: in te : It is not part of the Run-time Library. 

; $ soy : ENVIRONMENT: VAX=-11 user mode 

: t3 0045 1 ! AUTHOR: John Sauter, CREATION DATE: 03-Nov-78 

; «6446 0044 1! 

; 645 0045 1 ! MODIFIED BY: 

; 646 0046 1! Piige 

3; «647 0047 1 ! 1-001 = Original. h 

: «(48 0048 1 ! 1-002 - Ignore fifth argument of ERR macro in ERROR_LIST. JBS 28-DEC-78 

: 49 0049 1 ! 1-003 = modified to produce .MSG output rather than .MDL output. 

: 50 0050 1! MDL 24-Jun-198 

| Sy 0051 1 ! 1-004 - interface to BLISS caller. MDL 25-Jun-1982 

3 26 $036 1! 

Px & 0053 1 !-- 

; 54 054 1 

io 055 1! 

s $6 056 1 '<BLF/PAGE> 
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Se 


a — 


' 
; 
i 
NONE 
EXTERNAL REFERENCES: 


EXTERNAL ROUTINE 
LIB$SCOPY_R_DX; 


copy a string 
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BASSERRTXT 1b-Se -1984 01:44: AX-11 Bliss-32 V4.0-74 Pa 
1 1e-8ep-19 4 1:62:98 YBASRTL  SRe BASERRTXT.B352;1 - 
; @ 9037 1! 

; WF 28 1 ! SWITCHES: 

tie Bp 

3 ? sd : SWITCHES ADDRESSING_MODE (EXTERNAL = GENERAL, NONEXTERNAL = WORD_RELATIVE); 
; 664 $088 1! 

064 1 ! LINKAGES: 

; © 065 1! 

; 67 066 1! NONE 

; 8 $08 i TABLE OF CONTENTS 

; 7 Ooe9 1! 

ONS 0070 1 

ay 2 0071 1 FORWARD ROUTINE 

; 7 0072 #1 ERRTXT; ' Return name & text 

. = 0073 (1 

s 75 0074 1! 

s 0075 1 ! INCLUDE FILES: 

ee Gg 0076 1! 

; 0077 1 

: Le 4 Bne8 : LIBRARY "RTLSTARLE'; ! Define system symbols 

: a S54 : REQUIRE ‘RTLIN:BASERRMSG.REQ'; ! Define the ERROR_LIST macro 
. & 0704 1! 

; 0705 1 ! MACROS: 

;. 0706 1! 

; & 0707 1! NONE 

rs Or 0708 1! 

3 88 70 1 ! EQUATED SYMBOLS: 

- oe 7 1! 

:; 90 7 1 

s 91 7 1 LITERAL ie: 

: 4 7 } BASSK_FAC_NO = 26; ! The facility code number for BASIC 
: 94 1 

3 95 1 OWN STORAGE: 

s 1 

s 1 

; 1 

: 1 

3 1 

: 1 

3 1 

: 1 

3 1 
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GLOBAL ROUTINE ERRTXT ( 
CODE, 


NAMLEN, 
NAME, 
TXTLEN, 
TEXT, 
SEVLEN, 
SEVERITY 


) 


lee 


FUNCTIONAL DESCRIPTION: 


Return mnemonic and text of a BASIC 
error code to a BLISS program. 


FORMAL PARAMETERS: 


error code. 

IMPLICIT INPUTS: 

NONE 
IMPLICIT OUTPUTS: 

NONE 
! ROUTINE VALUE: 

Always success (SS$_NORMAL) 
COMPLETION CODES: 

NONE 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
! 
' SIDE EFFECTS: 


14 
-Sep-1984 
14-Sep-1984 


! get error info 


CODE.rl.r The BASIC-PLUS-2 error code. 
their meanings are Listed 
NAMLEN.wl.r The length of the VAX/VMS 
condition value. — 
NAME .wt.d The VAX/VMS mnemonic for t 
(Length as given above.) 
TXTLEN.wl.r The 
BASIC error code. | 
TEXT. wt.d The text corresponding to 
(Length as given above.) 
SEVLEN.wl.r The 
to the BASIC error code. 
SEVERITY.wt.d 


1:44: 


1:54: ; 
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! BASIC error code 


Length of mnemonic 
mnemonic 


length of text 
text of error message 


Length of severity 
severity 


The codes and 
in file BASERRMSG.REQ. 
mnemonic for the 


he condition value. 


ength of the text corresponding to the 


the BASIC error code. 


ength of the severity level corresponding 
the severity level corresponding to the BASIC 
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: NONE 


BEGIN 


'¢ 
define the SEVERITY LENGTH of each message 


ERR (NUMBER 
XCHARCOUNT (SEVERITY) 


BIND 

SEVERITY_LEN = UPLIT(ERROR_LIST) : VECTOR (256); 
UNDECLARE XQUOTE 

ERR; 


‘+ 
define the SEVERITY of each message 


CRO 
ERR (NUMBER, CODE, bg 


VER 
UPLIT (%ASCIZ XSTRING IT 


2 SE 
SEVER 


BIND 

SEVERITY_TEXT = UPLIT(ERROR_LIST) : VECTOR (256); 
UNDECLARE XQUOTE 

ERR; 


+ 
Define the length of each message. 


39 


CODE, TEXT, SEVERITY, SYSTEM_HANDLING) 


TY, SYSTEM_HANDLING) 


CRO 
ERR (NUMBER, CODE, TEXT, SEVERITY, SYSTEM_HANDLING) 


R 
ZCHARCOUNT (TEXT) 
ND 
MESSAGE _LEN = UPLIT(ERROR_LIST) : VECTOR (256); 
UNDECLARE ZQUOTE 
ERR; 


'¢ 
Define the text of each message. 


MACRO 


R 
ERR (NUMBER, CODE, TEXT, SEVERITY, SYSTEM_HANDLING) 


t 
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UPLIT (ZASCIZ TEXT) 


IND 
MESSAGE TEXT = UPLIT(ERROR_LIST) 
UNDECLARE %QUOTE 
ERR; 


'¢ 


ERR (NUMBER, CODE, TEXT, SEVERITY, 
ZCHARCOUNT (CODE) 


BIND 
UNDECLARE Z%QUOTE 
ERR; 


'4 
- Define the name of each message. 


ERR (NUMBER, CODE, TEXT, ar 
UPLIT (%ASCIZ XSTRING (CODE)) 


BIND 
UNDECLARE ZQUOTE 
ERR; 


'¢ 


LIBSSCOPY_R_DX (SEVERITY_LEN C..CODE), 


'¢ 
Also return the Lengths. 
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: VECTOR (256); 


‘ Define the Length of each name (will be 3, 6 or 9). 


SYSTEM_HANDLING) = 


NAME _LEN = UPLIT(ERROR_LIST) : VECTOR (256); 


SYSTEM_HANDLING) = 


NAME _TEXT = UPLITCERROR_LIST) : VECTOR (256); 


- Copy the message severity to the caller's descriptor. 


-SEVERITY_TEXT C..CODE], .SEVERITY); 


'¢ 
Copy the message text to the caller's descriptor. 
LIBSSCOPY_R_DX (MESSAGE_LEN C..CODE], .MESSAGE_TEXT C..CODE], .TEXT); 


'¢ 
Copy the message name to the caller's descriptor. 
LIBSSCOPY_R_DX (NAME_LEN (..CODE], .NAME_TEXT C..CODE], .NAME); 


Page 
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! of ERRTXT 


K 
R 
NORMAL) ; 


x 
E 
ALL done. 
RETURN (SS$ 
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P.AKA: .ASCII 
P.AKB: .ASCII 


ASCII 
P.AKC: .ASCII 


P.AKD: .ASCII 


ASCII 
P.AKE: .ASCII 


P.AKF: .ASCII 
P.AKG: .ASCII 
P.AKH: .ASCII 


-ASCII 
P.AKI: .ASCII 


P.AKJ: .ASCII 
P.AKK: .ASCII 
P.AKL: .ASCII 
P.AKM: .ASCII 


-ASCII 
P.AKN: .ASCII 


P.AKO: .ASCII 
P.AKP: .ASCII 
; P.AKQ: .ASCII 
C P.AKR: .ASCII 
; P.AKS: .ASCII 
C P.AKT: .ASCII 
; P.AKU: .ASCII 
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\VAX=-11 BASIC\<0><0><0><0> 
\Bad directory for device\<0><0><0> 


<0> 
\ILlegal file name\<0><0><0> 
\Account or device in use\<0><0><0> 


‘Ne room for user on device\<0><0> 
\Can't find file or account\<0><0> 
\Not a valid device\<0><0> 

\I/0 channel already open\<0><0><0> 


<0> 
\Device not available\<0><0><0><0> 


\I/0 channel not open\<0><0><0><0> 
\Protection violat ion\<0><0><0><0> 
\End af file on device\<0><0><0> 

\Fatal system 1/0 failure\<0><0><0> 


eer data error on device\<0><0><0> 
\Device hung or write locked\<0> 
\Keyboard wait exhausted\<0> 

\Name or account now exists\<0><0> 
\Too many open files on unit\<0> 
\ILlegal SYS() usage\<0> 

\Disk block is interlocked\<0><0><0> 
\Pack IDs don't match\<0><0><0><0> 
\Disk pack is not mounted\<0><0><0> 


<0> 

\Disk pack is locked out\<0> 
\ILlegal cluster size\<0><0><0><0> 
\Disk pack is private\<0><0><0><0> 


Se Se Se Se Se Se Se Se He Se Se Se Se Ge Se Se Se Se Se Fe Se Fe Ge Ge Ge Se Se Se Fe Se Se Se Be Se Be Se Se Se Fe Fe Se Se Se Se Se Fe Fe Se Be Se Se Fe Se Se Fe Se Be 
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| BASSERRTXT 16-Sep-1984 01:44: AX-11 Bliss-32 V4.0-74 
4 12-Sep-19 4 1390:9$ t 


73 64 65 65 20 68 63 61 70 20 6B 7 9 464 01674 P.AKZ: .ASCII \Disk pack needs ‘CLEANing'’\<0><0> : 
00 i 28 § 69 ot 41 45 4¢ 4 2 20 1983 ’ . 3 

6B 63 6) 0 $8 69 0 6c $1 74 61 1690 P.ALA: .ASCII \Fatal disk pack mount error\<0> : 
64 65 88 , et 74 e? oF ; ef $? é leat P.ALB ASCII \I/0 to detached keyboard\<0><0><0 : 
ALB: 0 detached keyboar ><0> : 

8 80 00 64 $5 61 6F 62 8 65 68 69 1088 Asti! <> : 3 

43 5E 20 65 6C 62 34 68 09 o9 i $1 gf ze 30 ba P.ALC: .ASCII \Programmable “C trap\<0><0><0><0> : 
20 65 6C 69 66 20 64 é 7 3 F a3 16E0 P.ALD: .ASCII \Corrupted file structure\<0><0><0> : 
80 80 6G 8S 93 78 fu Os 78 95 94 TR OleEe ns ; 

00 Bere «ASCII = <0> : : 

65 6C 69 68 20 74 gf $f 0 6 $3 $3 76 $3 4&4 i As P.ALE: .ASCII] \Device rot file-structured\<9><0> F 
00 00 64 $3 4 6 ¢ 74 20 01 : 

6F 63 20 65 74 79 6 $3 $6 61 67 6 C 6C 49 01718 P.ALF: .ASCII \Illegal byte count for 1/0\<0><0> : 
00 00 4F QF 4 ? 6F $6 8 4 6€ 75 C4 : 

65 63 61 70 73 20 72 65 66 66 6 0 6F f 01734 P.ALG: .ASCII \No buffer space available\<0><0><0> : 
00 00 0 5 of $ 61 6C 69 61 76 61 2 Hey : 

61 72 74 20 7 3 6 64 64 Bh . 6° 86 4 es P.ALH: .ASCII \Odd address trap\<%><0><0><0> : 
75 72 74 73 6€ 69 20 64 65 76 72 65 7 5 ¢ 01764 P.ALI: .ASCII \Reserved instruction trap\<0><0><0> : 
00 00 00 70 61 72 74 20 § 6F 69 74 63 01773 3 

65 6D 65 67 61 6E€ 61 6D 20 79 6F 6D 65 4D 01780 P.ALJ: .ASCII \Memory management violation\<0> 3 
00 of 6F 69 74 61 6C 6F 6 6 $8 4 $f 0178F : 

6C 66 72 65 76 4F 20 68 63 61 i ie 6 39 rE Ea P.ALK: .ASCII \SP stack Overflow\<0><0></)> 3 
69 72 75 64 20 72 6F 72 72 65 29 $8 a} 69 44 01780 P.ALL: .ASCII \Disk error during swap\<0><0> 3 
00 00 70 61 77 73 20 67 6E 017BF 3 

28 20 79 74 69 72 61 70 $9 79 72 6F 6D 65 4D 017C8 P.ALM: .ASCII \Memory parity (or ECC) failure\<0><0> 3 
65 72 75 6C 69 61 66 20 29 43 43 45 20 ie: gf SEA 3 
20 74 63 65 6C 65 73 20 65 70 61 74 67 61 4D O17E8 P.ALN: .ASCII \Magtape select error\<0><0><0><0> : 
00 00 00 00 72 6F 72 72 65 O17F7 3 

20 64 72 6F 63 65 72 20 65 70 61 74 67 61 4D 01800 P.ALO: .ASCII \Magtape record length error\<0> : 
00 72 6F 72 72 65 20 re: 74 67 #6E€ 65 6C 0180F : : 

6D 69 74 2D 6€ 75 72 20 73 65 72 2D 6E 6F oe 0181C P.ALP: .ASCII \Non-res run-time system\<0> 3 
00 6D 65 74 73 79 73 20 6 C4 ; 3 

20 72 65 66 66 75 62 20 6C 61 75 74 72 69 56 01834 P.ALQ: .ASCII \Virtual buffer too Large\<0><0><0> : 
00 00 00 65 67 72 61 6C 20 6F 74 01843 3 

00 0184F -ASCII <0> ; : 

6—€ 20 79 61 72 72 61 20 6C 61 75 74 72 69 56 01850 P.ALR: .ASCII \Virtual array not on disk\<0><0><0> 3 
00 00 73 69 64 $0 6E 6F 20 74 6F 0185F ; : 3 

79 61 72 72 61 20 72 6F 20 69 72 74 61 4D 0Q186C P.ALS: .ASCII \Matrix or array too big\<0> : 
00 67 69 6 60 F gf 74 g0 Hea : ; 

6— 20 79 61 72 re 61 20 6C § 4 3 9 56 01884 P.ALT: .ASCII \Virtual array not yet open\<0><0> ; 
09 6E § 70 6F 20 74 65 79 2 4 6F 01893 3 

61 68 63 20 4F F 49 20 6C 61 ef 8 of oe a Biaae P.ALU: .ASCII \Illegal 1/0 channel\<0> $ 
00 67 6E€ 6F 6C 20 6F 6F 74 20 65 6E 6 $5 1803 P.ALV: .ASCII \Line too Long\<0><0><0> j 
20 74 6€ 69 6F 70 20 67 6E 69 74 61 gf § 8 18C4 P.ALW: .ASCII \Floating point error or overflow\<0><0> : 
6C 66 72 65 76 6F 20 72 6F 20 72 6F 3 6 1303 ; 
00 00 7 ti 18E F 

9 0 O18E ASCII <0><0> : 3 

61 6C 20 6F 6 0 fF 65 75 «67 41 018E8 P.ALX: .ASCII \Argument too Large in EXP\<0><0><0> : 
0 90 50 58 45 6—€ 69 20 65 67 72 O18F : 

72 72 65 20 6D 6F 66 20 61 74 61 44 01904 P.ALY: .ASCII \Data format error\<0><0><0> 3 
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\Integer error or overflow\<0><0><0> 
\ILlegal number\<0><0> 

\ILlegal argument in LOG\<0> 
\Imaginary square roots\<0><0> 
\Subscript out of range\<0><0> 
\Can't invert matrix\<0> 


\Out of data\<0> 
\ON statement out of range\<0><0><0> 


\Not enough data in record\<0><0><0> 
\Integer overflow, FOR lLoop\<0><0> 
\Division by 0\<0><0><0> 

\No run-time system\<0><0> 

\FIELD overflows buf fer\<0><0> 

\Not a random access device\<0><0> 
\ILbegal MAGTAPE() usage\<0> 
\Missing special feature\<0> 
\ILlegal switch usage\<0><0><0><0> 
Ninused\cbo<03 

aera found\<0> 

\RETURN without GOSUB\<0><0><0><0> 
\FNEND without function call\<0> 
\Undefined function called\<0><0><0> 
\IL legal symbol \<0><0> 

\ILlegal verb\<0><0><0><0> 

\IlLlegal expression\<0><0> 

\ILlegal mode mixing\<0> 

\ILlegal IF statement\<0><0><0><0> 
\ILlegal conditional clause\<0><0> 
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B98 P.AND: .ASCII 
BA 

BBO P.ANE: .ASCII 
BBF 

ec P.ANF: .ASCII 
BD 

BEO P.ANG: .ASCII 
BEF 

BF8 P.ANH: .ASCII 
C07 

ce P.ANI: .ASCII 
C1 

ter P.ANJ: .ASCII 
C3C P.ANK: .ASCII 
C4B 

C54 P.ANL: .ASCII 
C63 

C68 P.ANM: .ASCII 
C77 

C84 P.ANN: .ASCII 
C93 

C98 P.ANO: .ASCII 
CA? 

CAC P.ANP: .ASCII 
CBB 

te P.ANQ: .ASCII 
CO4 P.ANR: .ASCII 
ce3 

CE8 P.ANS: .ASCII 
CF7 

DOO P.ANT: .ASCII 
DOF 

D14 P.ANU: .ASCII 
D23 

D24 P.ANV: .ASCII 
D33 

D38 P.ANW: .ASCII 
D47 

D4C P.ANX: .ASCII 
058 

44 P.ANY: .ASCII 
598 P.ANZ: .ASCII 
087 

D8C P.AOA: .ASCII 
D9B 

DAO P.AOB: .ASCII 
DAF 

DB4 P.AOC: .ASCII 
dCc3 

DDO P.AOD: .ASCII 
DOF 

DES P.AOE: .ASCII 
DF 

E04 P.AOF: .ASCII 
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\ILlegal function name\<0><0><0> 
\lllegal dummy variable\<0><0> 
\ILlegal FN redefinition\<0> 
\IlLlegal Line number(s) \<0><0> 
\Modifier error\<0><0> 

\Can't compile statement\<0> 
\Expression too complicated\<0><0> 
\Arguments don't match\<0><0><0> 
\Too many arguments\<0><0> 
\Inconsistent function usage\<0> 
\ILlegal DEF nesting\<0> 

\FOR without NEXT\<0><0><0><0> 
\NEXT without FOR\<0><0><0><0> 
\DEF without FNEND\<0><0><0> 
\FNEND without DEF \<0><0><0> 
\Literal string needed\<0><0><0> 
\Too few arguments\<0><0><0> 
\Syntax error \<0><0><0><0> 

\String is needed\<0><0><0><0> 
\Number is needed\<0><0><0><0> 
\Data type error\<0> 

\One or two dimensions only\<0><0> 
\Program lost-Sorry\<0><0> 

\RESUME and no error\<0> 
\Redimensioned array\<0> 
\Inconsistent subscript use\<0><0> 
\ON statement needs GOTO\<0> 

\End of statement not seen\<0><0><0> 
\What ?\<0><0><0> 
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N 15 
16-Sep-1984 01:44: 
12-3 08- 1 3be 1:54: 
6 9 20 64 61 4 1E0C P.AOG: .ASCII 
85 86 if $3 yi $ 35 1E1B 
6F gf 6 0 76 6F 4E iE¢s P.AOH: .ASCII 
6p § $2 of $¢ g $f 1€33 
6 4 75 63 6 : 4 1E40 P.AOI: .ASCII 
! v0 4! 6 g 1E4F 
20 65 61 6 ef 1654 P.AOJ: .ASCII 
68 6F § $0 4E 5 1Egs 
43 20 74 27 6E 61 $3 it” P.AOK: .ASCII 
78 65 20 65 6C 69 46 OQ1E80 P.AOL: .ASCII 
22 45 52 2F 45 4D 41 1EBF 
$8 4 4—E 49 52 50 O1E9C P.AOM: .ASCII 
72 72 65 20 74 61 6D O1EAB 
00 0O1E87 ASCII 
0 78 69 72 74 61 4D O1EBB P.AON: .ASCII 
5 6F 68 74 69 77 20 O1EC7 
6D 75 6€ ¢0 64 61 $5 Q1ED4 P.AOO: .ASCII 
53 55 2D 54 4E 49 52 O1EE3 
6C 61 67 65 6C 6C 49 OQIEFO P.AOP: .ASCII 
6D 20 65 74 61 69 64 OUEFF 
55 60 54 rt 49 28 50 31 oe P.AOQ: .ASCII 
65 76 6F 20 72 65 66 O1F1B 
6C 61 67 65 6C 6C 49 O1F28 P.AOR: .ASCII 
00 00 00 74 43 01F 37 
6C 61 67 65 6C $f 49 QO1F3C P.AOS: .ASCII 
65 6C 62 61 69 72 61 O1F4B 
00 00 00 70 6F 74 53 OQ1F5S4 P.AOT: .ASCII 
$3 78 69 72 74 61 4D O1FSC P.AOU: .ASCII 
2 6F 72 72 65 rH! oF 01F 6B 
6D 20 67 6E 6F 2 57 O74 P.AOV: .ASCII 
00 00 65 67 61 O1F83 
6D 75 6D 69 78 61 4D 01F88 P.AOW: .ASCII 
65 64 65 65 63 78 65 01F97 
66 20 45 4C 41 43 53 OQ1FAO P.AOX: .ASCII 
68 63 6F 6C 72 65 74 OI1FAF 
65 72 20 65 70 61 54 O1FB8 P.AOY: .ASCII 
00 49 53 rt: 41 20 74 QIFC7 
4F 42 20 65 70 61 54 O1FDO P.AOZ: .ASCII 
00 00 00 64 65 iy 
74 6F 6€ 20 79 65 4B O1FE4 P.APA: .ASCII 
00 4 $3 6C 62 OFFS 
Te 2 f& 6 0 6F 4E OFFS P.APB: .ASCII 
9 00 09 64 7 85007 
20 ¢ 6F 63 65 5 OOC P.APC: .ASCII 
65 74 6 $¢ 65 64 20 02018 ; 
6C 61 67 65 6C $f 49 0 Oe P.APD: .ASCII 
69 76 65 64 20 72 6F 02033 
00 O3F -ASCII 
61 63 9? 6¢ 0 75 «44 040 P.APE: .ASCII 
64 65 74 63 65 74 65 O4F : 
6C 61 67 65 6C 6C $0 Fe P.APF: .ASCII 
6C 61 67 65 6¢ 6C 29 6 po8 P.APG: .ASCII 
ee et ey es et be a9 02084 Paps ASCII 
8 ° a: 
§ 65 H 8 62 69 72 093 
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\Bad Line number pair\<0><0><0><0> 
\Not enough available memory\<0> 
\Execute only file\<0><0><0> 
\Please use the RUN command\<0><0> 
\Can*t CONTinue\<0><0> 

\File exists-RENAME/REPLACE\<0><0> 
\PRINT=USING format error\<0><0><0> 


<0> 
\Matrix or array without DIM\<0> 


\Bad number in PRINT-USING\<0><0><0> 
\ILlegal in immediate mode\<0><0><0> 


\PRINT-USING buffer over flow\<0> 
\Illegal statement\<0><0><0> 
\ILlegal FIELD variable\<0><0> 


\Stop\<0><0><0><0> 
\Matrix dimension error\<0><0> 


\Wrong math package\<0><0> 
\Maximum memory exceeded\<0> 
\SCALE factor interlock\<0><0> 
\Tape records not ANSI\<0><0><0> 
\Tape BOT detected\<0><0><0> 
\Key not changeable\<0><0> 


-\No current record\<0><0><0> 


\Record has been deleted\<0> 
\IlLlegal usage for device\<0><0><0> 


ust dean key detected\<0><0> 
\l lL legal usage\<0><0><0> 
\ILlegal or illogical access\<0> 
\ILlegal key attributes\<0><0> 
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eet} 
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14-Sep- 
69 09 44 P.API: 
43 32 pat P.APJ: 
ge rt oc? P.APK: 
45 rh poe P.APL: 
HBP a sem 
fh Fe fait pare 
of $3 0 ; ? P.APO: 
ap 
$5 8 Bie ro: 
e 7? 8 130 P.APQ: 
eg 5, 02168 P.APR: 
So ei 
00 0 187 
61 42 2188 P.APS: 
Se Si 
as Big rar 
6F 4 0518¢ P.APU: 
oe ge 
65 4B 02108 P.APV: 
$f Se 
$5 a2 BUF Paw 
GE als Pare 
$e Beg Pare 
82 27 09944 P.APZ: 
o 23 09986 P.AQA: 
SE B88 ao: 
6F 74 e7F 
ig 38 8 $88 P.AQC: 
$3 38 0 an P.AQD: 
oH Ses Pome 
f 23 8 oS P AQF: 
i c§ 0 7 P.AQG: 
6F 4E ; 04 P.AQH: 
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BASRTL.SRC JBASERRTXT .B52;1 


\File is locked\<0><0> 

\Invalid file options\<0><0><0><0> 
\Index not initial ized\<0><0><0> 
\ILlegal operat ion\<0><0><0> 
\Illegal record on file\<0><0> 

\Bad record identifier\<0><0><0> 
\Invalid key of reference\<0><0><0> 


<0> ; 
\Key size too Large\<0><0> 


\Tape not ANSI Labelled\<0><0> 
\RECORD number exceeds max imum\<0><0> 


<0> 
\Bad RECORDSIZE value on OPEN\<0><0> 


<0><0> 
\Not at end of file\<0><0> 


\No primary key specified\<0><0><0> 
<0> 
\Key field beyond end of record\<0><0> 


\IlLlogical record accessing\<0><0> 
\Record already exists\<0><0><0> 
\Record/bucket locked\<0><0><0><0> 
\Record not found\<0><0><0><0> 
\Size of record invalid\<0><0> 
\Record on file too big\<0><0> 
\Primary key out of sequence\<0> 
\Key larger than record\<0><0> 
\File attributes not matched\<0> 
\Move overflows buf fer\<0><0><0> 
\Cannot open file\<0><0><0><0> 

\No file name\<0><0><0><0> 
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16 
| BASSERRTXT 1bese -1984 01:44: AX-11 Bliss-32 V4.0-74 
hee: 1-Sep-19 4 1:82:99 EBASRTL-SRe BASERRTNT BS2:1 
0 13 
|74 61 6D 72 6F 0 6 1 69 6D 72 65 54 14 P.AQI: .ASCII \Terminal format file required\<0><0> 
Ce 8s 92 $6 88 8 88 36 ; 
ASCII <0> 
6— 6F 69 74 69 73 6F 70 20 74 6F gf 6E ¢! 4 P.AQJ: .ASCII \Cannot position to EOF\<0><0> 
6 69 66 8 4 7 69 7 1 a 68 é rey P.AQK ASCII \Negative fill tring Length\<0><0 
eAQK: egative or string len > 
68 65 6C 20 67 6€ 69 72 Wy 5 $3 73 0 Pe ’ . 9 
63 65 72 20 6C 61 67 65 $6 6C 49 5 $C P.AQL: .ASCII \Illegal record format\<0><0><0> 
oY . 00 74 61 6D 6F 66 B 
4C 4C 4 6C 61 67 65 $f 6C 49 02384 P.AQM: .ASCII \Illegal ALLOW clause\<0><0><0><0> 
00 00 09 OO 65 i 5 661 of 0 $37 
00 00 64 65 73 75 6€ 55 0239C P.AQN: .ASCII \Unused\<0><0> ; 
66 20 74 6F 6€ 20 78 65 64 6E€ 49 Q023A4 P.AQO: .ASCII \Index not fully optimized\<0><0><0> 
00 64 65 7A 69 6D 69 74 70 6F ¢9 02383 
6C 75 66 20 76 6F 6€ $0 56 52 52 023C0 P.AQP: .ASCII \RRV not fully updated\<0><0><0> 
00 00 00 64 65 74 61 64 70 QO ace 
68 63 6F 6C 20 64 72 6F 63 65 52 02308 P.AQQ: .ASCII \Record lock failed\<0><0> 
00 00 64 65 6C 02357 
41 46 52 20 64 69 6C 61 76 6E 49 O23EC P.AQR: .ASCII \Invalid RFA field\<0><0><0> 
00 00 00 64 6C 023FB 
61 72 69 70 78 65 20 65 6C 69 46 02400 P.AQS: .ASCII \File expiration date not yet reached\<0> 
79 20 74 6F 6E€ 20 65 74 61 64 20 0240F 
00 64 65 68 63 61 65 Beet 
00 00 00 0242 ASCII <0><0><0> 
65 20 65 6D 61 6E€ 20 65 64 6F rs Bees P.AQT: .ASCII \Node name error\<0> 
72 6F 20 65 76 69 74 61 67 65 4E 02438 P.AQU: .ASCII \Negative or zero TAB\<0><0><0><0> 
00 00 00 00 42 41 54 20 6F 02447 ‘ 
61 64 20 68 ** 75 6D 20 6F 6F 54 02450 P.AQV: .ASCII \Too much data in record\<0> 
00 64  - 6F 63 65 72 20 of 0245F : ; 
6F 6D 65 6D 20 6D 65 74 73 79 53 02468 P.AQW: .ASCII \System memory for file sharing exhausted\ 
61 68 73 20 65 6C 69 66 20 72 6F 02477 
64 65 74 73 75 61 68 78 65 20 02486 
00 00 00 00 02490 «ASCII <0><0><0><0>_ 
66 20 64 65 72 69 70 78 65 6E 55 02494 P.AQX: .ASCII \Unexpired file date\<0> 
00 65 74 61 64 024A3 : 
20 74 72 6F 70 70 75 73 20 6F 4E Bseas P.AQY: .ASCII \No support for operation in task\<0><0> 
69 20 6€ 6F 69 74 61 72 65 70 6F 0248 
00 00 68 73 024C6 
00 00 O24CA -ASCII <0><0> 
72 72 65 20 6€ § 6D 69 63 65 44 OQ24CC P.AQZ: .ASCII \Decimal error or overflow\<0><0><0> 
00 77 6F 6C 66 72 65 76 6F 20 72 02408 Y : 
65 70 6F 20 6B 72 6F 77 74 65 4E 8 4E8 P.ARA: .ASCII \Network operation rejected\<0><0> 
64 65 74 $ 65 6A 65 72 20 of gf 24F7 
66 72 65 76 6F 20 50 41 4D 4 3 02504 P.ARB: .ASCII \REMAP overflows buffer\<0><0> 
00 00 72 65 66 66 75 62 ¢ 02513 ‘ , 
52 20 64 65 6€ 67 69 6C 61 of 5 51C P.ARC: .ASCII \Unaligned REMAP variable\<0><0><0> 
00 00 65 6C 62 61 69 72 61 76 69 298 saree aie 
20 45 SA 49 53 44 38 4F 43 45 $2 538 P.ARD: .ASCII \RECORDSIZE overflows MAP buffer\<0> 
62 20 50 41 4D 20 77 «OF ge $8 2ef 
72 65 20 7 65 70 6F 72 70 6D ig 558 P.ARE: .ASCII \Improper error handling\<0> 
0 67 6€ 69 6C 64 6E 61 68 567 


D 16 

 BASSERRTXT 10-Sep-1984 01:44: AX-11 Bliss-32 V4.0-74 P 0 
1-004 12-88-1382 1:82:98 YBASRTL  SRe BASERRIGT 82:1 — (33 
} 

0 64 7 F 63 65 7 6C 61 67 65 6C 6C 49 570 P.ARF: .ASCII \Illegal record locking clause\<0><0> : 
6 es 3 9S GF 82 %§ 88 BS Gf 8S G8 bs St ec 257 ° . : 
54 49 & 49 & 50 4 4 4 GF & 4 0 28 P.ARG ASEH <UMLOCK EXPLICIT i RECORDSIZE 512 ; 

° ae requires - ; 

Ss 2? & & 3 20 af 2 ie 63 ae re 30 09598 \<0> " : 
9 32 31 ; 0 45 SA 49 53 44 SA : 

61 74 61 64 20 6 $f 4 76 69 § 0 6F 6F 54 588 P.ARH: .ASCII \Too Little data in record\<0><0><0> : 

| 00 00 00 64 72 6F 63 65 of 69 9 5C 3 
| 00 00 64 6 75 66 504 P.ARI: .ASCII \Unused\<0><0> : 
00 00 64 65 73 75 6€ 55 50C P.ARJ: .ASCII \Unused\<0><0> : 

8 00 64 65 73 75 6€ 2 8 5E4 P.ARK: .ASCII \Unused\<0><0> : 
0 00 64 65 73 75 6€ SEC P.ARL: .ASCII \Unused\<0><0> : 
00 00 64 65 ie 75 6€ 55 O25F4 P.ARM: .ASCII \Unused\<0><0> : 

00 00 64 65 73 75 6E 55 O25FC P.ARN: .ASCII \Unused\<0><0> : 

00 00 64 65 73 75 6E€ 55 02604 P.ARO: .ASCII \Unused\<0><0> : 

00 00 64 65 73 75 6€ 55 O0260C P.ARP: .ASCII \Unused\<0><0> F 

00 00 64 65 73 75 6€ 55 02614 P.ARQ: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6E 55 O261C P.ARR: .ASCII \Unused\<0><0> : 

00 00 64 65 73 75 6€ 55 02624 P.ARS: .ASCII \Unused\<0><0> ; 

00 00 64 65 73 75 6€ 55 ase C P.ART: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6€ 55 02634 P.ARU: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6E€ 55 0263C P.ARV: .ASCII \Unused\<0><0> 2 

00 00 64 65 73 75 6E€ 55 02644 P.ARW: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6€ 55 0264C P.ARX: .ASCII \Unused\<0><0> : 

00 00 64 65 73 75 6E 55 02654 P.ARY: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6€ 55 0265C P.ARZ: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6E€ 55 02664 P.ASA: .ASCII \Unused\<0><0> : 

00 00 64 65 73 75 6E 55 Q0266C P.ASB: .ASCII \Unused\<0><0> c 

00 00 64 65 73 75 6E 55 02674 P.ASC: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6E 55 O267C P.ASD: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6E 55 02684 P.ASE: .ASCII \Unused\<0><0> F 

00 00 64 65 73 75 6E€ 55 0268C P.ASF: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6E€ 55 02694 P.ASG: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6€ 55 0269C P.ASH: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6E€ 55 026A4 P.ASI: .ASCII \Unused\<0><0> ; 

00 00 64 65 73 75 6E€ 55 O26AC P.ASJ: .ASCII \Unused\<0><0> ; 

00 00 64 65 73 75 6€ 55 02684 P.ASK: .ASCII \Unused\<0><0> : 

00 00 64 65 73 75 6E 55 O26BC P.ASL: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6E€ 55 026C4 P.ASM: .ASCII \Unused\<0><0> $ 

00 00 64 65 73 75 6E€ 55 OQ26CC P.ASN: .ASCII \Unused\<0><0> : 

00 00 64 65 73 75 6E€ 55 02604 P.ASO: .ASCII \Unused\<0><0> : 

00 00 64 65 73 75 6€ 55 O26DC P.ASP: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6€ : BSoee P.ASQ: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 6€ 6EC P.ASR: .ASCII \Unused\<0><0> 3 

00 00 64 65 73 75 of 5 Bs ore P.ASS: .ASCII \Unused\<0><0> 2 

67 6€ 6F 6C 20 6F 6F 74 20 67 6E 69 72 74 83 3 orc P.AST: .ASCII \String too long\<0> 3 

74 75 62 69 72 74 74 61 20 64 72 6F 63 65 99 0270C P.ASU: .ASCII \Record attributes not matched\<0><0> : 

00 64 65 68 63 74 61 6D 20 74 6F 6E 20 73 82 0 at : 

00 ; 13 ASCII <0> : 

6F 44 65 73 75 20 67 6E€ 69 72 65 66 66 69 44 8 ie P.ASV: .ASCII \Differing use of LONG/WORD or SINGLE/DOU\ ; 

20 72 6F 20 44 2 6F § oF 4&4 4E 4F 4C 20 $6 738 3 

55 GF 44 OF 45 4C 47 af 49 74A ee : 

00 73 72 65 69 66 69 6C 61 75 71 20 4 4C 5 $i28 eASCII \BLE qualifiers\<0><0> : 


18-Sep-19 4 1:96:06 rete Bliss-32 itr ate. Page (3 


14-Sep-1984 11:54: BASRTL.SRCIBASERRT 
6— 69 20 73 64 6C 65 69 66 20 6F 4 764 P.ASW: .ASCII \No fields in image\<0><0> : 
69 69 go 8h GF 85288 . : 
69 72 74 es 8 gf i of 63 of of rp 4 P.ASX: .ASCII \Illegal string image\<0><0><0><0> : 
00 00 65 6 1 6D 69 23 of 6C 14 f 790 P.ASY: .ASCII \Null image\<0><0> : 
65 6D 5 +3 69 1 of o of é5 35 a P.ASZ: .ASCII \Illegal numeric image\<0><0><0> : 
67 61 6D 69 20 63 69 72 65 6D 75 4E 7B4 P.ATA: .ASCII \Numeric image for string\<0><0><0> : 
00 00 00 67 Ge 69 92 7% 93 30 93 i 0g7¢3 a ' ° : 
65 67 61 6D 69 20 67 6E& 69 72 7% 5 027D0 P.ATB: ASCII \String image for numeric\<0><0><0> : 
00 00 Go 65 69 72 65 o> 75 GE 20 72 2705 wf : 
00 O27EB ASCII <O> ; 
65 20 74 69 6D 69 6C 8 6 3 é? 2¢ ps 7EC P.ATC: .ASCII \TIME Limit exceeded\<0> : 
6F 74 98 67 72 61 20 74 3 72 69 re $5800 P.ATD: .ASCII \First arg to SEG$ greater than second\<0> ; 
74 20 72 65 74 61 65 72 67 20 26 47 O280F r 
00 64 6E 6F 63 65 73 $0 ith 3 
00 00 02826 ASCII <0><0> : 
20 74 73 75 6D 20 73 79 61 72 72 41 Bsees P.ATE: .ASCII \Arrays must be same dimension\<0><0> : 
69 73 6€ 65 6D 69 64 20 65 6D 61 73 02837 $ 
00 02846 3 
00 02847 ASCII <0> : 
20 74 73 75 6D 20 73 79 61 72 72 41 02848 P.ATF: .ASCII \Arrays must be square\<0><0><0> : 
00 00 00 65 72 61 75 71 73 02857 : 
67 6— 61 68 63 20 74 6F 6E 6E 61 43 02860 P.ATG: .ASCII \Cannot change array dimensions\<0><0> : 
69 73 6€ 65 6D 69 64 20 79 61 bs i: oSac 3 
65 76 6F 20 67 6E 69 74 61 6F 6C 46 02880 P.ATH: .ASCII \Floating overflow\<0><0><0> : 
00 00 00 77 6F 0288F ; : 
6—€ 75 20 67 6€ 69 74 61 6F 6C 46 02894 P.ATI: .ASCII \Floating underflow\<0><0> Z 
00 00 77 6F 6C 028A3 3 
6—E 6F 6€ 20 6F 74 20 4E 49 41 48 43 O28A8 P.ATJ: .ASCII \CHAIN to non-existent Line number\<0><0>~ ; 
20 65 6€ 69 6C 20 74 6€ 65 74 73 69 02887 : 
00 00 72 65 62 028C6 3 
00 028CB eASCII = <0> ae : 
69 74 61 69 74 6€ 65 6E 6F 70 78 45 OQ28CC P.ATK: .ASCII \Exponentiation error\<0><0><0><0> : 
00 00 00 00 72 6F 72 72 65 02808 3 
74 69 78 65 20 6C 61 67 65 6C 6C 49 O28E4 P.ATL: .ASCII \Illegal exit from DEF *\<0><0> : 
00 00 2A 46 45 44 20 6D 6F O028F3 r 
6—E 20 70 61 72 74 $2 26 4F 52 52 45 O28FC P.ATM: .ASCII \ERROR trap needs RESUME\<0> : 
00 45 4D 55 53 45 52 20 73 85308 F : 
55 53 45 52 20 6C 61 67 65 6C 6C 49 02914 P.ATN: .ASCII \IlLlegal RESUME to subroutine\<0><0> : 
6— 69 74 75 6F 72 62 75 73 20 6F 74 O 393 : 
00 00 02932 ASCII <0><0> ; 
75 74 65 72 20 6C 61 67 65 6C 6C 49 02934 P.ATO: .ASCII \Illegal return from subrout ine\<0><0> 3 
74 75 6F 72 62 75 73 20 6D 6F 72 $6 OSae3 3 
74 75 6F 0 74 $f 65 6D 75 67 "3 41 ; 954 P.ATP: .ASCII \Argument out of bounds\<0><0> $ 
2 00 73 64 6E€ 75 6F 62 20 02963 ‘ i 
6— 65 60 65 6C 70 6D 69 20 74 6F of 8 ast P.ATQ: .ASCII \Not implemented\<0> ; 
75 73 20 65 76 69 73 % 75 63 65 32 8 97C P.ATR: .ASCII \Recursive subroutine call\<0><0><0> : 
00 00 6C 6C 61 63 20 6 of 69 74 7 988 ; F 
69 61 66 20 50 43 41 68 45 4€ 49 rt: 02998 P.ATS: .ASCII \FILE ACP failure\<0><0><0><0> : 
° 09 08 00 6 8 9A7 : ; 3 
72 65 20 65 76 69 74 63 6 69 44 QAC P.ATT: .ASCII \Directive error\<0> : 
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| 
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\- 14-Sep-19 4 01:30:98 EBASRTL SRE BASERRTXT.832;1 . (§ 
45 49 44 D48 P.BOR: .ASCII \DIRERR\<0><0> : 
00 8 0 3 3 33 45 35 4E 22 D36 P.BOS: .ASCII \UNUERR Sei <O><O><0> : 
00 0 35 35 45 55 af D ‘ P.BDT: .ASCII \UNUERR255\<0><0><0> : 
00000000" * 44 04 i444 * 00000000' 00000000' + P.ATX: .ADDRESS P.ATY, P.ATZ, P.AUA, P.AUB, P.AUC, - : 
00000000' 00000000" 00000000° 00000000° 00000000' 4B D80 P.AUD, P.AUE, P. a We » P.AUH, P.AUI, = ;: 
00000000" 00000000" 00000000' 4B 44h a 00000° 03098 P.AUJ, P.AUK, P.AUL, P.AUM, P.AUN, P.AUO, = ; 
alleles 0000000" 00000000° 00000000' 0000° 44 8 4 P.AUP, P.AUQ, P.AUR, P.AUS, P.AUT, P.AUU, = ; 
“ 00000" 00000000° 4 8 0000000" 00000000" 03DC P.AUV, P.AUW, P.AUX, P.AUY, P.AUZ, P.AVA, = ; 
00000000* 00000000" 00000000° 00000000° 00000000' 4 peg P.AVB, P.AVC, P.AVD, P.AVE, P.AVF, P.AVG, = ; 
00000000* 00000000° 00000000° 00000000' 00000000" 00000000’ F8 P.AVH, P.AVI, P.AVJ, P.AVK, P.AVL, P.AVM, - ; 
00000000* C0000000" 00000000" 00000000" 00000000° 00000000' 03&10 P.AVN, P.AVO, P.AVP, P.AVQ, P.AVR, P.AVS, =: 
tales 4 BRBR8R8 - 4464 , 4 44 4 8 BRO ORR E28 P.AVT, P.AVU, P.AVV, P.AVW, P.AVX, P.AVY, =: 
0 0 Q ‘ > . E40 P.AVZ, P. AWA, P.AWB, P.AWC, P.AWD, P. AWE, = é 
00000000* 00000000° 00000000" 00000000' 00000000" 00000000' 03€58 P.AWF, P.AWG, P.AWH, P.AWl], P.AWJ, P.AWK, = ; 
00000000* 00000000" 90000000" 00000000° 00000000 44444 Bee 20 P.AWL, P.AWM, P.AWN, P.AWO, P.AWP, P.AWQ, = ; 
00000000* 00000000' 00000000' 44444 94444 4 0000000 03E€88 P.AWR, P.AWS, P.AWT, P.AWU, P.AWV, P.AWW, = ; 
00000000* 00000000' 00000000° 00000000' 00000000" 00000000' BEng P.AWX, P.AWY, P.AWZ, P.AXA, P.AXB, P.AXC, = ; 
00000000° 00* 00000000" 00000000" 00000000° 00000000' Hy P.AXD, P.AXE, P.AXF, P.AXG, P.AXH, P.AXI, = ; 
00000000° 00000000' 00000000" 00000000° 00000000° 00000000" 03ED0 P.AXJ, P.AXK, P.AXL, P,AXM, P.AXN, P.AXO, - ; 
00000000° 000° 00000000" 00000000° 00000000' 00000000° O3EE8 P.AXP, P.AXQ, P.AXR, P.AXS, P.AXT, P.AXU, - ; 
00000000* 00000000" 00000000° 00000000° 00000000° 00000000° 03F00 P.AXV, P.AXW, P.AXX, P.AXY, P.AXZ, P.AYA, =; 
00000000* 00000000' 00000000° 00000000" 00000000" 00000000° 03F18 P.AYB, P.AYC, P.AYD, P.AYE, P.AYF, P.AYG, =; 
00000000* 00000000* 00000000° 00000000" 00000000' 00000000° 03F30 P.AYH, P.AYI, P.AYJ, P.AYK, P.AYL, P.AYM, = ; 
00000000* 00000000* 00000000° 00000000" 00000000° 00000000° 03F48 P.AYN, P.AYO, P.AYP, P.AYQ, P.AYR, P.AYS, - ; 
00000000° 0 * 00000000° 00000000° 00000000° 00000000° 03F60 P.AYT, P.AYU, P.AYV, P.AYW, P.AYX, P.AYY, = ; 
00000000* 00000000' 00000000* 00000000' i444 444 00000000° 03F78 P.AYZ, P.AZA, P.AZB, P.AZC, P.AZD, P.AZE, - ; 
00000000" 00000000" 00000000° 00000000 00000000° 00000000' 03F90 P.AZF, P.AZG, P.AZH, P.AZI, P.AZJ, P.AZK, = ; 
00000000* 00000000° 00000000* 00000000" 00000000° 00000000° O35FA8 P.AZL, P.AZM, P.AZN, P.AZO, P.AZP, P.AZQ, - ; 
00000000* 00000000" 00000000° 00000000° 00000000 00000000' O3FCO P.AZR, P.AZS, P.AZT, P.AZU, P.AZV, P.AZW, - ; 
00000000* 00000000" 00000000° 00000000° 00000000° 00000000° O3FD8 P.AZX, P.AZY, P.AZZ, P.BAA, P.BAB, P.BAC, - ;: 
00000000* 00000000* 00000000° 00000000° 00000000° 00000000' O3FFO P.BAD, P.BAE, P.BAF, P.BAG, P.BAH, P.BAI, - ; 
00000000* 00000000" 00000000° 00000000° 00000000° 00000000' 04008 P.BAJ, P.BAK, P.BAL, P.BAM, P.BAN, P.BAO, - ; 
00000000* 00000000° 00000000° 00000000° 00000000° 00000000° 04020 P.BAP, P.BAQ, P.BAR, P.BAS, P.BAT, P.BAU, - ; 
00000000* 00000000" 00000000° 00000000' i444 4 0000000°* 04038 P.BAV, P.BAW, P.BAX, P.BAY, P.BAZ, P.BBA, - ; 
00000000" 00000000" 00000000° 00000000° 00000000° 00000000‘ 04050 P.BB8, P.BBC, P.BBD, P.BBE, P.BBF, P.BBG, - ; 
00000000" 00000000° 00000000° 00000000" 00000000" 00000000' 04068 P.BBH, P.BB1, P.BBJ, P.BBK, P.BBL, P.BBM, - ; 
00000000* 00000000* 00000000° 00000000" 00000000° 00000000° 04080 P.BBN, P.BB0, P.BBP, P.BBQ, P.BBR, P.BBS, - ; 
00000000* 00000000* 00000000° 00000000" 00000000° 00000000° 04098 P.BBT, P.BBU, P.BBV, P.BBW, P.BBX, P.BBY, - ; 
00000000" 00000000' BORO RRs 00000000" 00000000' 00000000° 04080 P.BBZ, P.BCA, P.BCB, P.BCC, P.BCD, P.BCE, - ; 
00000000* 00000000' G0000000" 00000000' 00000000" 00000000' 040C8 P.BCF, P.BCG, P.BCH, P.BCI1, P.BCJ, P.BCK, - ; 
00000000 00000000' 00000000" 00000000' 00000000° 00000000' 040E0 P.BCL, P.BCM, P.BCN, P.BCO, P.BCP, P.BCQ, - ; 
00000000* 00000000' 00000000" 00000000' 4444 00000000° 040F8 P.BCR, P.BCS, P.BCT, P.BCU, P.BCV, P.BCW, - ; 
00000000* 00000000* 00000000' 00000000° 00000000° 00000000 04110 P.BCX, P.BCY, P.BCZ, P.BDA, P.BDB, P.BDC, - ; 
00000000" 00000000' sia 0000000' 4a ai 04128 P.BDD, P.BDE, P.BDF, P.BDG, P.BDH, P.BDI. - ; 
00000000 00000000* 00000000" 00000000' 00000000' 00000000' 04140 P.BDJ, P.BDK, P.BDL, P.BDM, P.BDON, P.BDO, - ; 
00000000* 00000000° 00000000° 00000000° 04158 P.BDP, P.BDQ, P.BDR, P.BDS, P.BDT ; 
SEVERITY_LEN= P.AAA 
SEVERITY TEXT= P.AAB 
MESSAGE _CEN= P.AJY 
MESSAGE TEXT= P.AJZ 
NAME _LER= PLATW 
NAME ~TEXT= PL ATX 
-EXTRN LIBSSCOPY_R_DX 


-PSECT SCODES,NOWRT,2 
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BASSERRTXT 16-Sep-1984 01:44: AX-11 Bliss-32 V4.0-74 P 9 
1-004 1orgee71 382 F1i8ci8S = FeNSate Saeieasennict 6S2;1 age $3 
000C 0000 «ENTRY ERRTXT, Save R2.Re 3: 0726 
53 000000006 00 GE B38 MOVAB LIBSSCOPY_ Dx, R : 
1¢ AC DD 0000 PUSHL SEVERITY 3; 0882 
52 04 BC DO 0000 MOVL acODE, R2 : 
0000'CF42 DD 0001 PUSHL SEVERITY TEXTER23 : 
QO00'CF42 DF 0001 PUSHAL savers Ty LENCR2 : 
63 03 FB QOOIA ALLS #3, LIBSSCOPY_R_DXx : 
| 14 AC DD Q001D PUSHL TEXT ; 0887 
0000'CF42 DD 00020 USHL ms SoAGE TENT ERG. : 
QOOO'CF42 DF 00025 PUSHAL Shee LENCR2 : 
63 03 FB QO02A CALLS #3, LIBSSCOPY_R_DX : 
Of AC 0D 0002D PUSHL NAME ; 0892 
0000'CF42 DD 00030 PUSHL = fet thes : 
OO000'CF42 DF 00035 PUSHAL NAME _LENCR2 : 
63 03 FB OO03A CALLS #3, CIBSSCOPY_R_DXx : 
08 BC QOO0O0'CF42 00 00030 VL NAME_LENCR2), @NAMLEN 3; 0897 
10 BC QOOO'CF42 DO 00044 MOVL MESSAGE _LENCR2), @TXTLEN ; 0898 
18 BC Q0000'CF42 DO 0004 MOVL SEVERITY_LENLR21, @SEVLEN : 0899 
50 01 00 00059 MOVL #1, RO : 0904 
04 0005 RET 3; 0905 
; Routine Size: 86 bytes, Routine Base: $CODE$ + 0000 
: 286 0906 1 
s eer 0907 1 END 
; 288 0908 1 
; 289 0909 0 ELUDOM 
; PSECT SUMMARY 
: Name Bytes Attributes 
: SPLITS 16744 NOVEC,NOWRT, RD ,NOEXE,NOSHR, LCL, REL, CON,NOPIC,ALIGN(2) 
; SCODES 86 NOVEC,NOWRT, RD, EXE,NOSHR, LCL, REL, CON,NOPIC,ALIGN(2) 
; Library Statistics 
eA Nene ee a een eae Symbols -------- Pages Processing 
: File Total Loaded Percent Mapped Time 
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ta 10-88-1982 1:84:99 BASRTL.SRCJBASERRTXT.B32; 1 : 3) 


COMMAND QUALIFIERS 
BLISS/CHECK= (FIELD. INITIAL OPTIMIZE) /NOTRACE/LIS=LIS$:BASERRTXT/0BJ=0BJ$ :BASERRTXT MSRC$:BASERRTXT/UPDATE=(ENH$:BASERRTXT 


Size: 86 code + 16744 data bytes 
Run Time: Bb 

Elapsed Time: 01:47.9 

Lines/CPU Min: 10467 


Lexemes/CPU-Min: 46325 
penety Used: 396 pages 
Compilation Complete 
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